Những câu hỏi liên quan
V.Anh
Xem chi tiết
Cao ngocduy Cao
16 tháng 5 2022 lúc 18:38

Bạn VÔ đây mà tham khảo :

https://sachgiaibaitap.com/sach_giai/giai-tin-hoc-lop-11-bai-7-cac-thu-tuc-chuan-vao-ra-don-gian/#gsc.tab=0

~chucs hok tốt

Bình luận (1)
thanh mai
Xem chi tiết
Thanh Phong (9A5)
11 tháng 4 2023 lúc 15:22

Cách 1 dùng lệnh for do:

Uses crt;

var i,n,k: integer;

begin clrcsr;

readln(n);

for i:=1 to n do begin

if(i mod 2=0) and (i>=10) then k:=k*i;

end;

writeln(k);

readln;

end.

Cách 2 dùng lệnh while do

Uses crt;

var m,n,o: integer;

begin clrcsr;

readln(n);

o:=1;

m:=1;

while (m<n) do begin

m:=m+1;

if(m mod 2=0) and (m>=10) then o:=o*m;

end;

writeln(o);

readln;

end.

Bình luận (0)
Bảo Trâm
Xem chi tiết
Nguyễn Lê Phước Thịnh
6 tháng 4 2022 lúc 23:03

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

if (i%2==0) t+=i;

cout<<t;

return 0;

}

Bình luận (0)
Bảo Trâm
Xem chi tiết
Nguyễn Lê Phước Thịnh
6 tháng 4 2022 lúc 23:03

 

 

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

if (i%2!=0) t+=i;

cout<<t;

return 0;

}

 

Bình luận (0)
Nguyễn Quang Thư
Xem chi tiết
khue tran
Xem chi tiết
Nguyễn Lê Phước Thịnh
21 tháng 10 2021 lúc 23:37

#include <bits/stdc++.h>

using namespace std;

double x,y,z;

int main()

{

cin>>x>>y>>z;

cout<<"Dien tich la:"<<fixed<<setprecision(2)<<(x+y)/2*z;

return 0;

}

Bình luận (0)
Anthea2148
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 11 2021 lúc 23:29

Câu 3: 

uses crt;

var a,b:int64;

begin

clrscr;

readln(a,b);

writeln(a+b);

readln;

end.

Bình luận (0)
V.Anh
Xem chi tiết
NguyễnHưng
16 tháng 5 2022 lúc 21:17

Câu lệnh điều kiện:

Dạng thiếu:

If < điều kiện > then < câu lệnh >;

Dạng đầy đủ:

If < điều kiện > then < câu lệnh 1 > else < câu lệnh 2 >;

Lệnh lặp:

Biết trước:

For< Biến đếm > := < Giá trị đầu > to< Giá trị cuối > do < Câu lệnh >;

Chưa biết trước:

while < điều kiện > do < câu lệnh >;

Công thức đọc tên là gì mình ko hiểu @@

Câu 4 đưa ra hình điểm của từ người hs là sao mình ko hiểu nên mình cứ cho là in ra toàn bộ điểm từng người hs nhé, có gì bạn xem xét lại xóa khúc đó:

Bài 4 nữa nhưng muốn nhập nhiêu hs thì tùy(tối đa 100, muốn hơn nữa sữa lệnh khai báo mãng) Khiến khích nên dùng bài này vì nó tiện á:

Bình luận (4)
Nguyễn Gia Huy
Xem chi tiết
Thanh Phong (9A5)
15 tháng 3 2023 lúc 5:50

Uses crt;

var n,i: integer;

begin clrscr;

readln(n);

for i:=1 to n do if( i mod 2<>0) then write(i:3);

readln;

end.

 

Bình luận (0)
Lê Gia Anh
19 tháng 3 2023 lúc 20:25

uses crt;

var i,n:longint;

begin 

writeln('nhap n'); readln(n);

for i:=1 to n do if i mod 2 =1 then 

writeln(i);

readln;

end.

ngu ththế mà cũng ko làm được về lớp 1 mà học

Bình luận (0)